function animate_face(U, meanface, Img, compnum);
%% Zeigt die Rekonstruktion eines uebergebenen Bildes aus den ersten
%% <compnum> Eigenvektoren, wobei in 0.2 Sekunden Abstaenden jeweils die
%% Anzahl der verwendeten Komponenten um 1 erhoeht wird, das Bild neu
%% rekonstruiert wird - und anschliessend ausgegeben.
pic = meanface;

for i = 1 : compnum
    rec = reconstruct_face(U, meanface, Img, i);    % Rekonstruktion des Bildes - i principal components werden verwendet
    
    imagesc(rec);                                   % Ausgeben
    colormap(gray(256));                            % Wir verwenden Graustufenbilder
    daspect([1 1 1]);                               % Setzt die Aspect-Ratio, sodass das Bild nicht gestaucht angezeigt wird     
    set(gca, 'Visible', 'off'); % Axen ausblenden
    pause(0.2);
end;
end